object frmWorkDate: TfrmWorkDate
  Left = 128
  Top = 125
  Width = 778
  Height = 541
  Caption = #24037#20316#26085#35774#32622
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object SpeedButton1: TSpeedButton
    Left = 440
    Top = 264
    Width = 23
    Height = 22
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 770
    Height = 52
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object Label2: TLabel
      Left = 41
      Top = 21
      Width = 36
      Height = 12
      Caption = #33410#20551#26085
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 113
      Top = 21
      Width = 36
      Height = 12
      Caption = #24037#20316#26085
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Shape1: TShape
      Left = 17
      Top = 19
      Width = 17
      Height = 17
      Brush.Color = clAqua
    end
    object Shape2: TShape
      Left = 89
      Top = 19
      Width = 17
      Height = 17
      Brush.Color = clGradientActiveCaption
    end
    object lbl1: TLabel
      Left = 178
      Top = 21
      Width = 48
      Height = 12
      Caption = #24180'    '#20221
    end
    object dxspndt: TdxSpinEdit
      Left = 233
      Top = 17
      Width = 73
      ImeName = #20013#25991' ('#31616#20307') - '#25628#29399#25340#38899#36755#20837#27861
      TabOrder = 0
      OnChange = dxspndtChange
      MaxValue = 2500
      MinValue = 1991
      Value = 1991
      StoredValues = 48
    end
    object BitBtn1: TBitBtn
      Left = 569
      Top = 15
      Width = 75
      Height = 25
      Caption = #36864#20986#65288'&O'#65289
      TabOrder = 1
      OnClick = BitBtn1Click
    end
    object btnCancel: TBitBtn
      Left = 481
      Top = 15
      Width = 75
      Height = 25
      Caption = #21462#28040#65288'&C'#65289
      Enabled = False
      TabOrder = 2
      OnClick = btnCancelClick
    end
    object btnOK: TBitBtn
      Left = 401
      Top = 15
      Width = 75
      Height = 25
      Caption = #30830#23450#65288'&S'#65289
      Enabled = False
      TabOrder = 3
      OnClick = btnOKClick
    end
    object btnReset: TBitBtn
      Left = 321
      Top = 15
      Width = 75
      Height = 25
      Caption = #39044#35774#65288'&R'#65289
      TabOrder = 4
      OnClick = btnResetClick
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 52
    Width = 770
    Height = 462
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object yp: TYearPlanner
      Left = 2
      Top = 2
      Width = 766
      Height = 458
      Align = alClient
      Color = clGray
      DayColor = clInfoBk
      DayFont.Charset = DEFAULT_CHARSET
      DayFont.Color = clWindowText
      DayFont.Height = -11
      DayFont.Name = 'MS Sans Serif'
      DayFont.Style = []
      FlatCells = False
      GridPen.Style = psInsideFrame
      GridPen.Width = 0
      HeadingColor = clMoneyGreen
      HintFont.Charset = DEFAULT_CHARSET
      HintFont.Color = clWindowText
      HintFont.Height = -11
      HintFont.Name = 'MS Sans Serif'
      HintFont.Style = []
      MonthColor = clInfoBk
      MonthFont.Charset = DEFAULT_CHARSET
      MonthFont.Color = clWindowText
      MonthFont.Height = -11
      MonthFont.Name = 'MS Sans Serif'
      MonthFont.Style = []
      NoDayColor = clMenu
      SelectionColor = clGradientActiveCaption
      SoftBorder = True
      WeekendColor = clAqua
      WeekendHeadingColor = clAqua
      Year = 2007
      YearColor = clMoneyGreen
      YearFont.Charset = DEFAULT_CHARSET
      YearFont.Color = clWindowText
      YearFont.Height = -11
      YearFont.Name = 'MS Sans Serif'
      YearFont.Style = []
      YearNavigators = False
      OnDblClick = ypDblClick
      OnYearChange = ypYearChange
    end
  end
  object cds: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 560
    Top = 376
  end
end
